

setClass("AEP.HCSimplex", representation(
  b = "array",
  h = "numeric",
  s = "numeric",
  iteration = "numeric"
)
)
setMethod("initialize", "AEP.HCSimplex", function(.Object, or, lim, multiplier, it) {
  .Object@b <- or
  .Object@h <- lim
  .Object@s <- multiplier
  .Object@iteration <- it
  .Object
})